From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 19 Mar 2004 00:48:51 +0000 (+0000)
Subject: (add-change-log-entry): Simplify.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~23646
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=677bfa061b3c53c21770df8d08d68f9b152ee7ae;p=emacs.git

(add-change-log-entry): Simplify.
---

diff --git a/lisp/add-log.el b/lisp/add-log.el
index e6ec96baa74..609dfde5f65 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -1,6 +1,6 @@
 ;;; add-log.el --- change log maintenance commands for Emacs
 
-;; Copyright (C) 1985, 86, 88, 93, 94, 97, 98, 2000, 2003
+;; Copyright (C) 1985, 86, 88, 93, 94, 97, 98, 2000, 03, 2004
 ;;           Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
@@ -489,8 +489,7 @@ non-nil, otherwise in local time."
 			    (funcall add-log-buffer-file-name-function)
 			  buffer-file-name))
 	 (buffer-file (if buf-file-name (expand-file-name buf-file-name)))
-	 (file-name (expand-file-name
-		     (or file-name (find-change-log file-name buffer-file))))
+	 (file-name (expand-file-name (find-change-log file-name buffer-file)))
 	 ;; Set ITEM to the file name to use in the new item.
 	 (item (add-log-file-name buffer-file file-name))
 	 bound)